sink("FemalePoet_EducationType_TTest.txt")
t.test(WPM ~ EducationType, data = poets)
t.test(dynamism ~ EducationType, data = poets) 
t.test(speaking_rate ~ EducationType, data = poets)
t.test(complexityAllPauses ~ EducationType, data = poets)
t.test(complexitySyllables ~ EducationType, data = poets)
t.test(complexityPhrases ~ EducationType, data = poets)
t.test(pausecount ~ EducationType, data = poets)
t.test(pauserate ~ EducationType, data = poets)
t.test(pausemean100 ~ EducationType, data = poets)
t.test(f0mean ~ EducationType, data = poets)
t.test(f0range ~ EducationType, data = poets)
t.test(f0speed ~ EducationType, data = poets)
t.test(f0contour ~ EducationType, data = poets)
sink()
